﻿Imports System.IO
Public Class Files

#Region "nazvy adresarov a jednotlivych suborov ako konstanty"

    Public mFolderFormTemplates As String = "Form Templates"
    Public mFolderSolutionTemplates As String = "Solution Template"
    Public mFolderSolutionFileTemplates As String = "Templates"
    Public mFolderProjectTemplate = "Novy projekt"

    Public mFolderModules As String = "Modules"

    Public mFolderBin As String = "bin"
    Public mFolderEnums As String = "Enums"
    Public mFolderMyProject As String = "My Project"
    Public mFolderObj As String = "obj"

    Public mFileFormComponents As String = "Components.xml"
    Public mFileTplInit As String = "Init.vb"
    Public mFileTplLogTemplate As String = "log_template.vb"
    Public mFileTplDatTemplate As String = "dat_template.vb"
    Public mFileTplModTemplate As String = "mod_template.vb"

    Public mFileTplSolution As String = "Novy projekt.sln"
    Public mFileTplFrmMain As String = "FrmMain.vb"
    Public mFileTplFrmMainDesigner As String = "FrmMain.Designer.vb"
    Public mFileTplFrmResx As String = "FrmMain.resx"
    Public mFileTplProjectFile As String = "Novy projekt.vbproj"
    Public mFileTplProjectFileUser As String = "Novy projekt.vbproj.user"
    Public mFileTplProjectOneFrm As String = "OneFrmProject.vbproj"

    Public mPrefixMod As String = "mod_"
    Public mPrefixDat As String = "dat_"
    Public mPrefixLog As String = "log_"
    Public mPrefixFrm As String = "frm_"
    Public mPrefixView As String = "view_"

    Public mExtensionXmod As String = ".xmod"
    Public mExtensionAmod As String = ".amod"
    Public mExtensionVBSource As String = ".vb"
    Public mExtensionDbSql As String = ".mdf"
    Public mExtensionResx As String = ".resx"
    Public mExtensionSln As String = ".sln"
    Public mExtensionDesigner As String = ".Designer.vb"
    Public mExtensionVbproj As String = ".vbproj"

#End Region

    Public ReadOnly Property CompleteFolderProjectTemplate() As String
        Get
            Return Path.Combine(Me.mFolderSolutionTemplates, Me.mFolderProjectTemplate)
        End Get
    End Property

    Public ReadOnly Property CompleteFolderBinTemplate() As String
        Get
            Return Path.Combine(Me.CompleteFolderProjectTemplate, Me.mFolderBin)
        End Get
    End Property

    Public ReadOnly Property CompleteFolderEnumsTemplate() As String
        Get
            Return Path.Combine(Me.CompleteFolderProjectTemplate, Me.mFolderEnums)
        End Get
    End Property

    Public ReadOnly Property CompleteFolderObjTemplate() As String
        Get
            Return Path.Combine(Me.CompleteFolderProjectTemplate, Me.mFolderObj)
        End Get
    End Property

    Public ReadOnly Property CompleteFolderMyProjectTemplate() As String
        Get
            Return Path.Combine(Me.CompleteFolderProjectTemplate, Me.mFolderMyProject)
        End Get
    End Property


End Class


